home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / c / c2man-2.0pl33.lha / c2man-2.0 / amiga / amiga.c next >
Encoding:
C/C++ Source or Header  |  1995-01-22  |  410 b   |  29 lines
  1. /*
  2. ** $PROJECT:
  3. **
  4. ** $VER: amiga.c 2.1 (22.01.95)
  5. **
  6. ** by
  7. **
  8. ** Stefan Ruppert , Windthorststraße 5 , 65439 Flörsheim , GERMANY
  9. **
  10. ** (C) Copyright 1995
  11. ** All Rights Reserved !
  12. **
  13. ** $HISTORY:
  14. **
  15. ** 22.01.95 : 000.001 : initial
  16. */
  17.  
  18. #include "/c2man.h"
  19.  
  20. /* return Process ID.
  21.  * The Amiga has no really process id , so return the address of TCB
  22. */
  23.  
  24. long getpid(void)
  25. {
  26.    return(((long) FindTask(NULL)));
  27. }
  28.  
  29.